home *** CD-ROM | disk | FTP | other *** search
/ Apple Reference & Presen…tion Library 4 (Reseller) / Apple Ref. & Pres. Lib.v4.0.iso / 4-Demos / Apple Demos / CPUs / Macintosh Portable Tech Tour / Macintosh Portable Tech Tour / background_3896.txt < prev    next >
Text File  |  1990-03-19  |  8KB  |  367 lines
  1. -- background: 3896 from stack: in
  2. -- bmap block id: 6814
  3. -- flags: 4000
  4. -- background id: 0
  5. -- name: Technology
  6. ----- HyperTalk script -----
  7. on opencard
  8.   lock screen
  9.   set the hilite of bg btn "battery" to false
  10.   set the hilite of bg btn "digital video" to false
  11.   set the hilite of bg btn "display information" to false
  12.   set the hilite of bg btn "power saving" to false
  13.   if fld indicator = "b"
  14.   then set the hilite of bg btn "battery" to true
  15. else if fld indicator = "v"
  16. then set the hilite of bg btn "digital video" to true
  17. else if fld indicator = "d"
  18. then set the hilite of bg btn "display information" to true
  19. else set the hilite of bg btn "power saving" to true
  20. unlock screen
  21. end opencard
  22.  
  23.  
  24. -- part 17 (field)
  25. -- low flags: 01
  26. -- high flags: 0000
  27. -- rect: left=12 top=34 right=58 bottom=496
  28. -- title width / last selected line: 0
  29. -- icon id / first selected line: 0 / 0
  30. -- text alignment: 0
  31. -- font id: 21
  32. -- text size: 18
  33. -- style flags: 0
  34. -- line height: 24
  35. -- part name: Header
  36.  
  37.  
  38. -- part 18 (button)
  39. -- low flags: 00
  40. -- high flags: 8002
  41. -- rect: left=12 top=307 right=328 bottom=84
  42. -- title width / last selected line: 0
  43. -- icon id / first selected line: 0 / 0
  44. -- text alignment: 1
  45. -- font id: 3
  46. -- text size: 9
  47. -- style flags: 0
  48. -- line height: 12
  49. -- part name: Specifications
  50. ----- HyperTalk script -----
  51. on mouseUp
  52.   visualTrans "Specs"
  53. end mouseUp
  54.  
  55.  
  56.  
  57. -- part 19 (button)
  58. -- low flags: 00
  59. -- high flags: 8002
  60. -- rect: left=87 top=307 right=328 bottom=168
  61. -- title width / last selected line: 0
  62. -- icon id / first selected line: 0 / 0
  63. -- text alignment: 1
  64. -- font id: 3
  65. -- text size: 9
  66. -- style flags: 0
  67. -- line height: 12
  68. -- part name: Under The Hood
  69. ----- HyperTalk script -----
  70. on mouseUp
  71.   visualTrans "Internals"
  72. end mouseUp
  73.  
  74.  
  75.  
  76. -- part 20 (button)
  77. -- low flags: 00
  78. -- high flags: 8002
  79. -- rect: left=171 top=307 right=328 bottom=219
  80. -- title width / last selected line: 0
  81. -- icon id / first selected line: 0 / 0
  82. -- text alignment: 1
  83. -- font id: 3
  84. -- text size: 9
  85. -- style flags: 0
  86. -- line height: 12
  87. -- part name: Family
  88. ----- HyperTalk script -----
  89. on mouseUp
  90.   visualTrans "Family"
  91. end mouseUp
  92.  
  93.  
  94.  
  95. -- part 21 (button)
  96. -- low flags: 00
  97. -- high flags: 2000
  98. -- rect: left=223 top=305 right=328 bottom=248
  99. -- title width / last selected line: 0
  100. -- icon id / first selected line: 1014 / 1014
  101. -- text alignment: 1
  102. -- font id: 0
  103. -- text size: 12
  104. -- style flags: 0
  105. -- line height: 16
  106. -- part name: Prev
  107. ----- HyperTalk script -----
  108. on mouseUp
  109.   visual effect iris open
  110.   go prev card
  111. end mouseUp
  112.  
  113.  
  114.  
  115. -- part 22 (button)
  116. -- low flags: 00
  117. -- high flags: 2000
  118. -- rect: left=259 top=305 right=328 bottom=286
  119. -- title width / last selected line: 0
  120. -- icon id / first selected line: 1013 / 1013
  121. -- text alignment: 1
  122. -- font id: 0
  123. -- text size: 12
  124. -- style flags: 0
  125. -- line height: 16
  126. -- part name: Next
  127. ----- HyperTalk script -----
  128. on mouseUp
  129.   visual effect iris open
  130.   go next card
  131. end mouseUp
  132.  
  133.  
  134.  
  135. -- part 23 (button)
  136. -- low flags: 00
  137. -- high flags: 8002
  138. -- rect: left=290 top=307 right=328 bottom=357
  139. -- title width / last selected line: 0
  140. -- icon id / first selected line: 0 / 0
  141. -- text alignment: 1
  142. -- font id: 3
  143. -- text size: 9
  144. -- style flags: 0
  145. -- line height: 12
  146. -- part name: Peripherals
  147. ----- HyperTalk script -----
  148. on mouseUp
  149.   visualTrans "Peripherals"
  150. end mouseUp
  151.  
  152.  
  153.  
  154. -- part 24 (button)
  155. -- low flags: 00
  156. -- high flags: C002
  157. -- rect: left=360 top=307 right=328 bottom=414
  158. -- title width / last selected line: 0
  159. -- icon id / first selected line: 0 / 0
  160. -- text alignment: 1
  161. -- font id: 3
  162. -- text size: 9
  163. -- style flags: 0
  164. -- line height: 12
  165. -- part name: Technology
  166.  
  167.  
  168. -- part 25 (button)
  169. -- low flags: 00
  170. -- high flags: 8002
  171. -- rect: left=417 top=307 right=328 bottom=474
  172. -- title width / last selected line: 0
  173. -- icon id / first selected line: 0 / 0
  174. -- text alignment: 1
  175. -- font id: 3
  176. -- text size: 9
  177. -- style flags: 0
  178. -- line height: 12
  179. -- part name: Marketing
  180. ----- HyperTalk script -----
  181. on mouseUp
  182.   visualTrans "Marketing"
  183. end mouseUp
  184.  
  185.  
  186.  
  187. -- part 26 (button)
  188. -- low flags: 00
  189. -- high flags: 2000
  190. -- rect: left=477 top=307 right=328 bottom=496
  191. -- title width / last selected line: 0
  192. -- icon id / first selected line: 21847 / 21847
  193. -- text alignment: 1
  194. -- font id: 0
  195. -- text size: 12
  196. -- style flags: 0
  197. -- line height: 16
  198. -- part name: Home
  199. ----- HyperTalk script -----
  200. on mouseUp
  201.   domenu home
  202. end mouseUp
  203.  
  204.  
  205.  
  206. -- part 27 (button)
  207. -- low flags: 00
  208. -- high flags: 2000
  209. -- rect: left=468 top=279 right=302 bottom=496
  210. -- title width / last selected line: 0
  211. -- icon id / first selected line: 2162 / 2162
  212. -- text alignment: 1
  213. -- font id: 0
  214. -- text size: 12
  215. -- style flags: 0
  216. -- line height: 16
  217. -- part name: New Button
  218. ----- HyperTalk script -----
  219. on mouseUp
  220.   go recent card
  221. end mouseUp
  222.  
  223.  
  224.  
  225. -- part 38 (button)
  226. -- low flags: 00
  227. -- high flags: 8002
  228. -- rect: left=62 top=282 right=303 bottom=160
  229. -- title width / last selected line: 0
  230. -- icon id / first selected line: 0 / 0
  231. -- text alignment: 1
  232. -- font id: 3
  233. -- text size: 9
  234. -- style flags: 0
  235. -- line height: 12
  236. -- part name: Display Information
  237. ----- HyperTalk script -----
  238. on mouseUp
  239.   go to card id 14093
  240. end mouseUp
  241.  
  242.  
  243.  
  244. -- part 40 (button)
  245. -- low flags: 00
  246. -- high flags: 8002
  247. -- rect: left=162 top=282 right=303 bottom=234
  248. -- title width / last selected line: 0
  249. -- icon id / first selected line: 0 / 0
  250. -- text alignment: 1
  251. -- font id: 3
  252. -- text size: 9
  253. -- style flags: 0
  254. -- line height: 12
  255. -- part name: Battery
  256. ----- HyperTalk script -----
  257. on mouseUp
  258.   go to card id 38373
  259. end mouseUp
  260.  
  261.  
  262.  
  263.  
  264. -- part 41 (button)
  265. -- low flags: 00
  266. -- high flags: 8002
  267. -- rect: left=237 top=282 right=303 bottom=309
  268. -- title width / last selected line: 0
  269. -- icon id / first selected line: 0 / 0
  270. -- text alignment: 1
  271. -- font id: 3
  272. -- text size: 9
  273. -- style flags: 0
  274. -- line height: 12
  275. -- part name: Power Saving
  276. ----- HyperTalk script -----
  277. on mouseUp
  278.   go to card id 15037
  279. end mouseUp
  280.  
  281.  
  282.  
  283.  
  284. -- part 42 (button)
  285. -- low flags: 00
  286. -- high flags: C002
  287. -- rect: left=312 top=282 right=303 bottom=384
  288. -- title width / last selected line: 0
  289. -- icon id / first selected line: 0 / 0
  290. -- text alignment: 1
  291. -- font id: 3
  292. -- text size: 9
  293. -- style flags: 0
  294. -- line height: 12
  295. -- part name: Digital Video
  296. ----- HyperTalk script -----
  297. on mouseUp
  298.   go to card id 15739
  299. end mouseUp
  300.  
  301.  
  302.  
  303.  
  304. -- part 44 (field)
  305. -- low flags: 01
  306. -- high flags: 0000
  307. -- rect: left=14 top=63 right=89 bottom=494
  308. -- title width / last selected line: 0
  309. -- icon id / first selected line: 0 / 0
  310. -- text alignment: 0
  311. -- font id: 21
  312. -- text size: 18
  313. -- style flags: 0
  314. -- line height: 24
  315. -- part name: Title
  316.  
  317.  
  318. -- part 45 (field)
  319. -- low flags: 01
  320. -- high flags: 2007
  321. -- rect: left=14 top=104 right=275 bottom=221
  322. -- title width / last selected line: 0
  323. -- icon id / first selected line: 0 / 0
  324. -- text alignment: 0
  325. -- font id: 3
  326. -- text size: 9
  327. -- style flags: 0
  328. -- line height: 12
  329. -- part name: Specs
  330.  
  331.  
  332. -- part 46 (field)
  333. -- low flags: 80
  334. -- high flags: 0002
  335. -- rect: left=403 top=284 right=302 bottom=432
  336. -- title width / last selected line: 0
  337. -- icon id / first selected line: 0 / 0
  338. -- text alignment: 0
  339. -- font id: 3
  340. -- text size: 12
  341. -- style flags: 0
  342. -- line height: 16
  343. -- part name: indicator
  344.  
  345.  
  346. -- part 48 (button)
  347. -- low flags: 00
  348. -- high flags: 2000
  349. -- rect: left=6 top=284 right=302 bottom=25
  350. -- title width / last selected line: 0
  351. -- icon id / first selected line: 6089 / 6089
  352. -- text alignment: 1
  353. -- font id: 0
  354. -- text size: 12
  355. -- style flags: 0
  356. -- line height: 16
  357. -- part name: Copy Field To Clipboard
  358. ----- HyperTalk script -----
  359. on mouseUp
  360.   set lockscreen to true
  361.   --"bg field textField" is the source container/field
  362.   select text of bg fld "specs"
  363.   doMenu "Copy Text"
  364.   set lockscreen to false
  365. end mouseUp
  366.  
  367.